home *** CD-ROM | disk | FTP | other *** search
/ Fritz: All Fritz / All Fritz.zip / All Fritz / FILES / EDUCMATH / MERCURY.LZH / MERCURYZ.EXE / GCD.EKA < prev    next >
Text File  |  1992-03-24  |  283b  |  14 lines
  1. ; Demo of external functions.
  2.  
  3. ; GCD computes the greatest common divisor of two numbers.
  4. EXTERNAL GCD
  5. ; ASINH is the inverse hyperbolic sine.
  6. EXTERNAL ASINH
  7.  
  8. ; correct answer is 7
  9. a = GCD(156562431911123, 442677773754356)
  10.  
  11. ; should get c = PI
  12. b = SINH(PI)
  13. c = ASINH(b)
  14.